object FDevolucaoRequisicao: TFDevolucaoRequisicao
  Left = 266
  Top = 148
  BorderStyle = bsSingle
  Caption = 'Devolu'#231#227'o de Requisi'#231#227'o'
  ClientHeight = 516
  ClientWidth = 852
  Color = clBtnFace
  Constraints.MaxHeight = 550
  Constraints.MaxWidth = 860
  Constraints.MinHeight = 550
  Constraints.MinWidth = 860
  Font.Charset = ANSI_CHARSET
  Font.Color = clWindowText
  Font.Height = -13
  Font.Name = 'Arial'
  Font.Style = []
  OldCreateOrder = False
  PopupMenu = PopupMenu1
  Position = poDesktopCenter
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 16
  object dbgItens: TDBGrid
    Left = 0
    Top = 41
    Width = 852
    Height = 395
    Align = alClient
    Ctl3D = False
    DataSource = dsDevolucao
    ParentCtl3D = False
    PopupMenu = PopupMenu1
    TabOrder = 0
    TitleFont.Charset = ANSI_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -13
    TitleFont.Name = 'Arial'
    TitleFont.Style = []
    OnDrawColumnCell = dbgItensDrawColumnCell
    OnKeyDown = dbgItensKeyDown
    OnKeyPress = dbgItensKeyPress
    Columns = <
      item
        Expanded = False
        FieldName = 'ITENS_REQ_PRODCODIGO'
        Width = 55
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'ITENS_REQ_PROD_DESC'
        Width = 299
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'LOCAL_DESC'
        Title.Caption = 'Local'
        Width = 218
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'ITENS_REQ_QTD_ATENDIDA'
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'ITENS_REQ_QTDDEVOLVIDA'
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'QUANTIDADE_A_DEVOLVER'
        Visible = True
      end>
  end
  object Panel1: TPanel
    Left = 0
    Top = 436
    Width = 852
    Height = 80
    Align = alBottom
    TabOrder = 1
    object Label1: TLabel
      Left = 8
      Top = 8
      Width = 258
      Height = 16
      Caption = 'Pressione Ctrl + F Para localizar um produto'
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'Arial'
      Font.Style = [fsItalic]
      ParentFont = False
    end
    object BtnSalvar: TBitBtn
      Tag = 1
      Left = 744
      Top = 5
      Width = 100
      Height = 25
      Caption = '&Devolver'
      TabOrder = 0
      OnClick = BtnSalvarClick
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        0400000000000001000000000000000000001000000000000000000000000000
        8000008000000080800080000000800080008080000080808000C0C0C0000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF003FFFFFFFFFFF
        FFFF33333333333FFFFF3FFFFFFFFF00000F333333333377777F33FFFFFFFF09
        990F33333333337F337F333FFFFFFF09990F33333333337F337F3333FFFFFF09
        990F33333333337FFF7F33333FFFFF00000F3333333333777773333333FFFFFF
        FFFF3333333333333F333333333FFFFF0FFF3333333333337FF333333333FFF0
        00FF33333333333777FF333333333F00000F33FFFFF33777777F300000333000
        0000377777F33777777730EEE033333000FF37F337F3333777F330EEE0333330
        00FF37F337F3333777F330EEE033333000FF37FFF7F333F77733300000333000
        03FF3777773337777333333333333333333F3333333333333333}
      NumGlyphs = 2
    end
    object BtnCancelar: TBitBtn
      Tag = 1
      Left = 640
      Top = 5
      Width = 100
      Height = 25
      Caption = '&Cancelar'
      TabOrder = 1
      OnClick = BtnCancelarClick
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000130B0000130B00001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
        3333333333FFFFF3333333333999993333333333F77777FFF333333999999999
        33333337777FF377FF3333993370739993333377FF373F377FF3399993000339
        993337777F777F3377F3393999707333993337F77737333337FF993399933333
        399377F3777FF333377F993339903333399377F33737FF33377F993333707333
        399377F333377FF3377F993333101933399377F333777FFF377F993333000993
        399377FF3377737FF7733993330009993933373FF3777377F7F3399933000399
        99333773FF777F777733339993707339933333773FF7FFF77333333999999999
        3333333777333777333333333999993333333333377777333333}
      NumGlyphs = 2
    end
    object StaticText1: TStaticText
      Left = 8
      Top = 24
      Width = 188
      Height = 20
      Alignment = taCenter
      AutoSize = False
      BorderStyle = sbsSingle
      Caption = 'Devolvido Totalmente'
      Color = clGray
      Font.Charset = ANSI_CHARSET
      Font.Color = clWhite
      Font.Height = -13
      Font.Name = 'Arial'
      Font.Style = [fsItalic]
      ParentColor = False
      ParentFont = False
      TabOrder = 2
    end
    object StaticText2: TStaticText
      Left = 8
      Top = 43
      Width = 188
      Height = 20
      Alignment = taCenter
      AutoSize = False
      BorderStyle = sbsSingle
      Caption = 'Quantidade a devolver Inv'#225'lida'
      Color = clRed
      Font.Charset = ANSI_CHARSET
      Font.Color = clWhite
      Font.Height = -13
      Font.Name = 'Arial'
      Font.Style = []
      ParentColor = False
      ParentFont = False
      TabOrder = 3
    end
  end
  object Panel2: TPanel
    Left = 0
    Top = 0
    Width = 852
    Height = 41
    Align = alTop
    TabOrder = 2
    object Label2: TLabel
      Left = 8
      Top = 8
      Width = 68
      Height = 16
      Caption = 'Requisi'#231#227'o:'
    end
    object DBText1: TDBText
      Left = 80
      Top = 8
      Width = 40
      Height = 16
      DataField = 'REQ_CODIGO'
      DataSource = dsRequisicao
    end
    object Label3: TLabel
      Left = 128
      Top = 8
      Width = 31
      Height = 16
      Caption = 'Data:'
    end
    object Label4: TLabel
      Left = 280
      Top = 8
      Width = 76
      Height = 16
      Caption = 'Requisitante:'
    end
    object DBText2: TDBText
      Left = 163
      Top = 8
      Width = 105
      Height = 17
      DataField = 'REQ_DATA'
      DataSource = dsRequisicao
    end
    object DBText3: TDBText
      Left = 363
      Top = 8
      Width = 294
      Height = 17
      DataField = 'REQ_SOLICITANTE_DESC'
      DataSource = dsRequisicao
    end
    object Label5: TLabel
      Left = 672
      Top = 8
      Width = 71
      Height = 16
      Caption = 'Quant.Itens:'
    end
    object Label6: TLabel
      Left = 750
      Top = 8
      Width = 70
      Height = 16
      AutoSize = False
    end
  end
  object dsDevolucao: TDataSource
    DataSet = cdsDevolucao
    OnDataChange = dsDevolucaoDataChange
    Left = 240
    Top = 152
  end
  object cdsDevolucao: TClientDataSet
    Aggregates = <>
    Filter = '(ITENS_REQ_QTD_ATENDIDA > 0) '
    Filtered = True
    IndexFieldNames = 'ITENS_REQ_REQCODIGO'
    MasterFields = 'REQ_CODIGO'
    MasterSource = FValidacaoRequisicao.dsCadastro
    PacketRecords = 0
    Params = <>
    ProviderName = 'dspDevolucao'
    Left = 152
    Top = 240
    object cdsDevolucaoITENS_REQ_CODIGO: TIntegerField
      DisplayWidth = 6
      FieldName = 'ITENS_REQ_CODIGO'
    end
    object cdsDevolucaoITENS_REQ_REQCODIGO: TIntegerField
      FieldName = 'ITENS_REQ_REQCODIGO'
    end
    object cdsDevolucaoITENS_REQ_PRODCODIGO: TIntegerField
      DisplayLabel = 'C'#243'digo'
      DisplayWidth = 8
      FieldName = 'ITENS_REQ_PRODCODIGO'
    end
    object cdsDevolucaoITENS_REQ_PROD_DESC: TStringField
      DisplayLabel = 'Descri'#231#227'o'
      DisplayWidth = 45
      FieldName = 'ITENS_REQ_PROD_DESC'
      Size = 60
    end
    object cdsDevolucaoCODIGOEMPRESA: TIntegerField
      FieldName = 'CODIGOEMPRESA'
    end
    object cdsDevolucaoITENS_REQ_LOCAL: TIntegerField
      DisplayLabel = 'Local'
      FieldName = 'ITENS_REQ_LOCAL'
    end
    object cdsDevolucaoLOCAL_DESC: TStringField
      FieldKind = fkLookup
      FieldName = 'LOCAL_DESC'
      LookupDataSet = DMGestao.QLocal
      LookupKeyFields = 'LOC_CODIGO'
      LookupResultField = 'LOC_DESCRICAO'
      KeyFields = 'ITENS_REQ_LOCAL'
      Size = 40
      Lookup = True
    end
    object cdsDevolucaoITENS_REQ_QTD_ATENDIDA: TFloatField
      DisplayLabel = 'Quant.Atend'
      FieldName = 'ITENS_REQ_QTD_ATENDIDA'
      DisplayFormat = '#.###'
    end
    object cdsDevolucaoITENS_REQ_DATADEVOLUCAO: TFloatField
      DisplayLabel = 'Data.Dev'
      FieldName = 'ITENS_REQ_DATADEVOLUCAO'
    end
    object cdsDevolucaoITENS_REQ_QTDDEVOLVIDA: TFloatField
      DisplayLabel = 'Quant.Dev'
      FieldName = 'ITENS_REQ_QTDDEVOLVIDA'
    end
    object cdsDevolucaoQUANTIDADE_A_DEVOLVER: TFloatField
      DisplayLabel = 'A Devolver'
      FieldKind = fkInternalCalc
      FieldName = 'QUANTIDADE_A_DEVOLVER'
    end
    object cdsDevolucaoITENS_REQ_QUANTIDADE: TFloatField
      FieldName = 'ITENS_REQ_QUANTIDADE'
    end
    object cdsDevolucaoITENS_REQ_KIT_CODIGO: TIntegerField
      FieldName = 'ITENS_REQ_KIT_CODIGO'
    end
    object cdsDevolucaoITENS_REQ_SITUACAO: TStringField
      FieldName = 'ITENS_REQ_SITUACAO'
      FixedChar = True
      Size = 1
    end
    object cdsDevolucaoITENS_REQ_VALIDACAO: TStringField
      FieldName = 'ITENS_REQ_VALIDACAO'
      FixedChar = True
      Size = 1
    end
    object cdsDevolucaoUSUARIO_CADASTRO: TIntegerField
      FieldName = 'USUARIO_CADASTRO'
    end
    object cdsDevolucaoUSUARIO_AUTERACAO: TIntegerField
      FieldName = 'USUARIO_AUTERACAO'
    end
    object cdsDevolucaoUSUARIO_EXCLUSAO: TIntegerField
      FieldName = 'USUARIO_EXCLUSAO'
    end
    object cdsDevolucaoDATA_CADASTRO: TDateTimeField
      FieldName = 'DATA_CADASTRO'
    end
    object cdsDevolucaoDATA_AUTERACAO: TDateTimeField
      FieldName = 'DATA_AUTERACAO'
    end
    object cdsDevolucaoDATA_EXCLUSAO: TDateTimeField
      FieldName = 'DATA_EXCLUSAO'
    end
    object cdsDevolucaoEXCLUIDO: TStringField
      FieldName = 'EXCLUIDO'
      FixedChar = True
      Size = 1
    end
    object cdsDevolucaoITENS_REQ_DATA_VALIDACAO: TDateTimeField
      FieldName = 'ITENS_REQ_DATA_VALIDACAO'
    end
  end
  object dspDevolucao: TDataSetProvider
    DataSet = FValidacaoRequisicao.QItensRequisicao
    Constraints = True
    Left = 240
    Top = 232
  end
  object PopupMenu1: TPopupMenu
    Left = 416
    Top = 144
    object LocalizarItem1: TMenuItem
      Caption = 'Localizar Item'
      ShortCut = 16454
      OnClick = LocalizarItem1Click
    end
  end
  object dsRequisicao: TDataSource
    DataSet = FValidacaoRequisicao.cdsCadastro
    Left = 120
    Top = 136
  end
end
